← Index
NYTProf Performance Profile   
For /usr/share/koha/opac/cgi-bin/opac/opac-search.pl
  Run on Tue Oct 15 17:10:45 2013
Reported on Tue Oct 15 17:12:48 2013

Filename(eval 1041)[/usr/share/perl5/Lingua/Stem/AutoLoader.pm:88]
StatementsExecuted 30 statements in 2.61ms
Eval Invoked At/usr/share/perl5/Lingua/Stem/AutoLoader.pm line 88
Subroutines
Calls P F Exclusive
Time		 Inclusive
Time		 Subroutine
11124µs69µsLingua::Stem::De::::BEGIN@2 Lingua::Stem::De::BEGIN@2
11121µs70µsLingua::Stem::Da::::BEGIN@50 Lingua::Stem::Da::BEGIN@50
11120µs66µsLingua::Stem::Fr::::BEGIN@34 Lingua::Stem::Fr::BEGIN@34
11120µs63µsLingua::Stem::EnBroken::::BEGIN@146Lingua::Stem::EnBroken::BEGIN@146
11117µs58µsLingua::Stem::No::::BEGIN@98 Lingua::Stem::No::BEGIN@98
11117µs61µsLingua::Stem::En::::BEGIN@18 Lingua::Stem::En::BEGIN@18
11116µs42µsLingua::Stem::Pt::::BEGIN@114 Lingua::Stem::Pt::BEGIN@114
11116µs52µsLingua::Stem::It::::BEGIN@82 Lingua::Stem::It::BEGIN@82
11116µs52µsLingua::Stem::Gl::::BEGIN@66 Lingua::Stem::Gl::BEGIN@66
11110µs33µsLingua::Stem::Sv::::BEGIN@130 Lingua::Stem::Sv::BEGIN@130
0000s0sLingua::Stem::Da::::AUTOLOAD Lingua::Stem::Da::AUTOLOAD
0000s0sLingua::Stem::De::::AUTOLOAD Lingua::Stem::De::AUTOLOAD
0000s0sLingua::Stem::En::::AUTOLOAD Lingua::Stem::En::AUTOLOAD
0000s0sLingua::Stem::EnBroken::::AUTOLOADLingua::Stem::EnBroken::AUTOLOAD
0000s0sLingua::Stem::Fr::::AUTOLOAD Lingua::Stem::Fr::AUTOLOAD
0000s0sLingua::Stem::Gl::::AUTOLOAD Lingua::Stem::Gl::AUTOLOAD
0000s0sLingua::Stem::It::::AUTOLOAD Lingua::Stem::It::AUTOLOAD
0000s0sLingua::Stem::No::::AUTOLOAD Lingua::Stem::No::AUTOLOAD
0000s0sLingua::Stem::Pt::::AUTOLOAD Lingua::Stem::Pt::AUTOLOAD
0000s0sLingua::Stem::Sv::::AUTOLOAD Lingua::Stem::Sv::AUTOLOAD
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments		 Time
on line		 Calls Time
in subs		 Code
1package Lingua::Stem::De;
23291µs2114µs
# spent 69µs (24+45) within Lingua::Stem::De::BEGIN@2 which was called: # once (24µs+45µs) by Lingua::Stem::BEGIN@7 at line 2
use vars qw($AUTOLOAD);
# spent 69µs making 1 call to Lingua::Stem::De::BEGIN@2 # spent 45µs making 1 call to vars::import
3sub AUTOLOAD {
4 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
5 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
6 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
7 }
8 $_autoloaded_functions->{$AUTOLOAD} = 1;
9 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
10 eval ("use $packagename;");
11 if ($@ ne '') {
12 die ("Unable to use packagename: $@\n");
13 }
14 goto &$AUTOLOAD;
15}
16
17package Lingua::Stem::En;
183280µs2106µs
# spent 61µs (17+44) within Lingua::Stem::En::BEGIN@18 which was called: # once (17µs+44µs) by Lingua::Stem::BEGIN@7 at line 18
use vars qw($AUTOLOAD);
# spent 61µs making 1 call to Lingua::Stem::En::BEGIN@18 # spent 44µs making 1 call to vars::import
19sub AUTOLOAD {
20 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
21 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
22 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
23 }
24 $_autoloaded_functions->{$AUTOLOAD} = 1;
25 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
26 eval ("use $packagename;");
27 if ($@ ne '') {
28 die ("Unable to use packagename: $@\n");
29 }
30 goto &$AUTOLOAD;
31}
32
33package Lingua::Stem::Fr;
343291µs2112µs
# spent 66µs (20+46) within Lingua::Stem::Fr::BEGIN@34 which was called: # once (20µs+46µs) by Lingua::Stem::BEGIN@7 at line 34
use vars qw($AUTOLOAD);
# spent 66µs making 1 call to Lingua::Stem::Fr::BEGIN@34 # spent 46µs making 1 call to vars::import
35sub AUTOLOAD {
36 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
37 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
38 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
39 }
40 $_autoloaded_functions->{$AUTOLOAD} = 1;
41 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
42 eval ("use $packagename;");
43 if ($@ ne '') {
44 die ("Unable to use packagename: $@\n");
45 }
46 goto &$AUTOLOAD;
47}
48
49package Lingua::Stem::Da;
503289µs2118µs
# spent 70µs (21+49) within Lingua::Stem::Da::BEGIN@50 which was called: # once (21µs+49µs) by Lingua::Stem::BEGIN@7 at line 50
use vars qw($AUTOLOAD);
# spent 70µs making 1 call to Lingua::Stem::Da::BEGIN@50 # spent 49µs making 1 call to vars::import
51sub AUTOLOAD {
52 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
53 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
54 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
55 }
56 $_autoloaded_functions->{$AUTOLOAD} = 1;
57 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
58 eval ("use $packagename;");
59 if ($@ ne '') {
60 die ("Unable to use packagename: $@\n");
61 }
62 goto &$AUTOLOAD;
63}
64
65package Lingua::Stem::Gl;
663244µs289µs
# spent 52µs (16+37) within Lingua::Stem::Gl::BEGIN@66 which was called: # once (16µs+37µs) by Lingua::Stem::BEGIN@7 at line 66
use vars qw($AUTOLOAD);
# spent 52µs making 1 call to Lingua::Stem::Gl::BEGIN@66 # spent 37µs making 1 call to vars::import
67sub AUTOLOAD {
68 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
69 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
70 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
71 }
72 $_autoloaded_functions->{$AUTOLOAD} = 1;
73 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
74 eval ("use $packagename;");
75 if ($@ ne '') {
76 die ("Unable to use packagename: $@\n");
77 }
78 goto &$AUTOLOAD;
79}
80
81package Lingua::Stem::It;
823283µs288µs
# spent 52µs (16+36) within Lingua::Stem::It::BEGIN@82 which was called: # once (16µs+36µs) by Lingua::Stem::BEGIN@7 at line 82
use vars qw($AUTOLOAD);
# spent 52µs making 1 call to Lingua::Stem::It::BEGIN@82 # spent 36µs making 1 call to vars::import
83sub AUTOLOAD {
84 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
85 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
86 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
87 }
88 $_autoloaded_functions->{$AUTOLOAD} = 1;
89 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
90 eval ("use $packagename;");
91 if ($@ ne '') {
92 die ("Unable to use packagename: $@\n");
93 }
94 goto &$AUTOLOAD;
95}
96
97package Lingua::Stem::No;
983243µs298µs
# spent 58µs (17+40) within Lingua::Stem::No::BEGIN@98 which was called: # once (17µs+40µs) by Lingua::Stem::BEGIN@7 at line 98
use vars qw($AUTOLOAD);
# spent 58µs making 1 call to Lingua::Stem::No::BEGIN@98 # spent 40µs making 1 call to vars::import
99sub AUTOLOAD {
100 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
101 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
102 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
103 }
104 $_autoloaded_functions->{$AUTOLOAD} = 1;
105 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
106 eval ("use $packagename;");
107 if ($@ ne '') {
108 die ("Unable to use packagename: $@\n");
109 }
110 goto &$AUTOLOAD;
111}
112
113package Lingua::Stem::Pt;
1143153µs268µs
# spent 42µs (16+26) within Lingua::Stem::Pt::BEGIN@114 which was called: # once (16µs+26µs) by Lingua::Stem::BEGIN@7 at line 114
use vars qw($AUTOLOAD);
# spent 42µs making 1 call to Lingua::Stem::Pt::BEGIN@114 # spent 26µs making 1 call to vars::import
115sub AUTOLOAD {
116 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
117 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
118 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
119 }
120 $_autoloaded_functions->{$AUTOLOAD} = 1;
121 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
122 eval ("use $packagename;");
123 if ($@ ne '') {
124 die ("Unable to use packagename: $@\n");
125 }
126 goto &$AUTOLOAD;
127}
128
129package Lingua::Stem::Sv;
1303314µs256µs
# spent 33µs (10+23) within Lingua::Stem::Sv::BEGIN@130 which was called: # once (10µs+23µs) by Lingua::Stem::BEGIN@7 at line 130
use vars qw($AUTOLOAD);
# spent 33µs making 1 call to Lingua::Stem::Sv::BEGIN@130 # spent 23µs making 1 call to vars::import
131sub AUTOLOAD {
132 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
133 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
134 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
135 }
136 $_autoloaded_functions->{$AUTOLOAD} = 1;
137 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
138 eval ("use $packagename;");
139 if ($@ ne '') {
140 die ("Unable to use packagename: $@\n");
141 }
142 goto &$AUTOLOAD;
143}
144
145package Lingua::Stem::EnBroken;
1463223µs2106µs
# spent 63µs (20+43) within Lingua::Stem::EnBroken::BEGIN@146 which was called: # once (20µs+43µs) by Lingua::Stem::BEGIN@7 at line 146
use vars qw($AUTOLOAD);
# spent 63µs making 1 call to Lingua::Stem::EnBroken::BEGIN@146 # spent 43µs making 1 call to vars::import
147sub AUTOLOAD {
148 return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o);
149 if (exists $_autoloaded_functions->{$AUTOLOAD}) {
150 die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n");
151 }
152 $_autoloaded_functions->{$AUTOLOAD} = 1;
153 my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois;
154 eval ("use $packagename;");
155 if ($@ ne '') {
156 die ("Unable to use packagename: $@\n");
157 }
158 goto &$AUTOLOAD;
159}
160
161
162;
Report produced by the NYTProf 4.04 Perl profiler, developed by Tim Bunce and Adam Kaplan.